Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/p4/p4-1_2a.lha/p4-1.2a/lib_f/p4_fargs.f

Text File | 1992-10-19 | 320b | 14 lines

      subroutine args(i,argv)
C reads the options from the command line
      integer i
C DO NOT declare argv any bigger than 80
      character*80 argv
      call getarg(i,argv)
      end

      subroutine numargc(icnt)
C retrieves the number of command line arguments
      integer icnt
      icnt = iargc()
      end